/*
 *  JsonRpc-Cpp - JSON-RPC implementation.
 *  Copyright (C) 2008-2011 Sebastien Vincent <sebastien.vincent@cppextrem.com>
 *
 *  This program is free software: you can redistribute it and/or modify
 *  it under the terms of the GNU Lesser General Public License as published by
 *  the Free Software Foundation, either version 3 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU Lesser General Public License for more details.
 *
 *  You should have received a copy of the GNU Lesser General Public License
 *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

/**
 * \file jsonrpc_udpserver.cpp
 * \brief JSON-RPC UDP server.
 * \author Sebastien Vincent
 */

#include <iostream>
#include <stdexcept>

#include "jsonrpc_udpserver.h"

#include "netstring.h"

namespace Json
{
namespace Rpc
{
UdpServer::UdpServer(const std::string& address, uint16_t port) :
		Server(address, port)
{
	m_protocol = networking::UDP;
}

UdpServer::~UdpServer()
{
}

ssize_t UdpServer::Send(const std::string& data, const struct sockaddr* addr,
		socklen_t addrlen)
{
	std::string rep = data;

	/* encoding if any */
	if (GetEncapsulatedFormat() == Json::Rpc::NETSTRING)
	{
		rep = netstring::encode(rep);
	}

	return ::sendto(m_sock, rep.c_str(), rep.length(), 0,
			(struct sockaddr*) addr, addrlen);
}

bool UdpServer::Recv(int fd)
{
	Json::Value response;
	ssize_t nb = -1;
	char buf[1500];
	struct sockaddr_storage addr;
	socklen_t addrlen = sizeof(struct sockaddr_storage);

	nb = ::recvfrom(fd, buf, sizeof(buf), 0, (struct sockaddr*) &addr,
			&addrlen);

	if (nb > 0)
	{
		std::string msg = std::string(buf, nb);

		if (GetEncapsulatedFormat() == Json::Rpc::NETSTRING)
		{
			try
			{
				msg = netstring::decode(msg);
			} catch (const netstring::NetstringException& e)
			{
				/* error parsing NetString */
				std::cerr << e.what() << std::endl;
				return false;
			}
		}

		/* give the message to JsonHandler */
		m_jsonHandler.Process(msg, response);

		/* in case of notification message received, the response could be Json::Value::null */
		if (response != Json::Value::null)
		{
			std::string rep = m_jsonHandler.GetString(response);

			/* encoding */
			if (GetEncapsulatedFormat() == Json::Rpc::NETSTRING)
			{
				rep = netstring::encode(rep);
			}

			if (::sendto(fd, rep.c_str(), rep.length(), 0,
					(struct sockaddr*) &addr, addrlen) == -1)
			{
				/* error */
				std::cerr << "Error while sending" << std::endl;
				return false;
			}
		}

		return true;
	}

	return false;
}

void UdpServer::WaitMessage(uint32_t ms)
{
	fd_set fdsr;
	struct timeval tv;
	int max_sock = m_sock;

	max_sock++;

	FD_ZERO(&fdsr);

#ifdef _WIN32
	/* on Windows, a socket is not an int but a SOCKET (unsigned int) */
	FD_SET((SOCKET)m_sock, &fdsr);
#else
	FD_SET(m_sock, &fdsr);
#endif

	tv.tv_sec = ms / 1000;
	tv.tv_usec = (ms % 1000) * 1000;

	if (select(max_sock, &fdsr, NULL, NULL, ms ? &tv : NULL) > 0)
	{
		if (FD_ISSET(m_sock, &fdsr))
		{
			Recv(m_sock);
		}
	}
	else
	{
		/* problem */
	}
}
} /* namespace Rpc */
} /* namespace Json */

